Delphi Programmer's Power Pack/Delphi Volume 1.iso/s_to_z/tabutil/tabtest.dfm/tabtest.txt

Text File | 1996-09-15 | 12KB | 518 lines

object Form1: TForm1
  Left = 94
  Top = 87
  HorzScrollBar.Visible = False
  VertScrollBar.Visible = False
  BorderIcons = [biSystemMenu]
  BorderStyle = bsDialog
  Caption = 'Table Utilities'
  ClientHeight = 321
  ClientWidth = 513
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'System'
  Font.Style = []
  PixelsPerInch = 96
  Position = poScreenCenter
  OnActivate = FormActivate
  TextHeight = 16
  object Label7: TLabel
    Left = 40
    Top = 8
    Width = 101
    Height = 16
    Caption = 'Work on this field'
    Font.Color = clBlack
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label5: TLabel
    Left = 208
    Top = 8
    Width = 126
    Height = 16
    Caption = 'Group on these fields'
    Font.Color = clBlack
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Notebook: TTabbedNotebook
    Left = 8
    Top = 88
    Width = 497
    Height = 225
    TabsPerRow = 4
    TabFont.Color = clBtnText
    TabFont.Height = -11
    TabFont.Name = 'MS Sans Serif'
    TabFont.Style = []
    TabOrder = 2
    object TTabPage
      Left = 5
      Top = 26
      Caption = 'Summary'
      object Label2: TLabel
        Left = 160
        Top = 32
        Width = 161
        Height = 16
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object Button2: TButton
        Left = 8
        Top = 72
        Width = 137
        Height = 33
        Caption = 'ColumnTotal'
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 0
        OnClick = Button2Click
      end
      object Button3: TButton
        Left = 8
        Top = 29
        Width = 137
        Height = 33
        Caption = 'Group Summary'
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 1
        OnClick = Button3Click
      end
      object Button4: TButton
        Left = 8
        Top = 112
        Width = 137
        Height = 33
        Caption = 'DS SQL ColumnTotal'
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 2
        OnClick = Button4Click
      end
      object Button5: TButton
        Left = 8
        Top = 152
        Width = 139
        Height = 33
        Caption = 'DSTable ColumnTotal'
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 3
        OnClick = Button5Click
      end
      object DBGrid1: TDBGrid
        Left = 159
        Top = 65
        Width = 320
        Height = 120
        DataSource = DataSource1
        Options = [dgTitles, dgIndicator, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit]
        TabOrder = 4
        TitleFont.Color = clWindowText
        TitleFont.Height = -13
        TitleFont.Name = 'System'
        TitleFont.Style = []
      end
    end
    object TTabPage
      Left = 5
      Top = 26
      Caption = 'Statistical'
      object Label3: TLabel
        Left = 112
        Top = 58
        Width = 353
        Height = 71
        Font.Color = clBlack
        Font.Height = -21
        Font.Name = 'Times New Roman'
        Font.Style = [fsItalic]
        ParentFont = False
        WordWrap = True
      end
      object Button10: TButton
        Left = 16
        Top = 25
        Width = 73
        Height = 25
        Caption = 'Min'
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 0
        OnClick = Button10Click
      end
      object Button11: TButton
        Left = 16
        Top = 81
        Width = 73
        Height = 25
        Caption = 'Max'
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 1
        OnClick = Button11Click
      end
      object Button12: TButton
        Left = 16
        Top = 137
        Width = 73
        Height = 25
        Caption = 'Avg'
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 2
        OnClick = Button12Click
      end
    end
    object TTabPage
      Left = 5
      Top = 26
      Caption = 'Import/Export'
      object Label4: TLabel
        Left = 24
        Top = 8
        Width = 67
        Height = 16
        Caption = 'Export type'
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object Label6: TLabel
        Left = 192
        Top = 8
        Width = 58
        Height = 16
        Caption = 'Export To'
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object Button6: TButton
        Left = 192
        Top = 128
        Width = 137
        Height = 33
        Caption = 'DataSet Export'
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 3
        OnClick = Button6Click
      end
      object Button7: TButton
        Left = 192
        Top = 80
        Width = 137
        Height = 33
        Caption = 'ExportToTxt'
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 4
        OnClick = Button7Click
      end
      object Button9: TButton
        Left = 24
        Top = 128
        Width = 137
        Height = 33
        Caption = 'Append From CSV'
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 5
        OnClick = Button9Click
      end
      object ExportTypeDD: TComboBox
        Left = 24
        Top = 29
        Width = 153
        Height = 24
        Style = csDropDownList
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ItemHeight = 16
        Items.Strings = (
          'Comma Separated'
          'Fixed'
          'Quoted')
        ParentFont = False
        Sorted = True
        TabOrder = 0
      end
      object ExportPath: TEdit
        Left = 192
        Top = 29
        Width = 129
        Height = 24
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 1
        Text = 'C:\EXP2TXT.TXT'
      end
      object Button13: TButton
        Left = 352
        Top = 24
        Width = 89
        Height = 33
        Caption = 'View It'
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 2
        OnClick = Button13Click
      end
      object Button8: TButton
        Left = 24
        Top = 80
        Width = 137
        Height = 33
        Caption = 'Create From CSV'
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 6
        OnClick = Button8Click
      end
    end
    object TTabPage
      Left = 5
      Top = 26
      Caption = 'Other'
      object Label1: TLabel
        Left = 70
        Top = 96
        Width = 5
        Height = 23
        Font.Color = clBlack
        Font.Height = -21
        Font.Name = 'Times New Roman'
        Font.Style = [fsItalic]
        ParentFont = False
      end
      object Button1: TButton
        Left =